Profile of (eval 392)[Sub/Quote.pm:3]

Filename	(eval 392)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 14 statements in 313µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	11µs	35µs	JSON::Schema::Modern::Document::OpenAPI::BEGIN@7
1	1	1	8µs	26µs	Method::Generate::Accessor::_Generated::BEGIN@39.251
1	1	1	6µs	6µs	Method::Generate::Accessor::_Generated::BEGIN@12.250
0	0	0	0s	0s	JSON::Schema::Modern::Document::OpenAPI::_set_metaschema_uri

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	3µs			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
3	1	0s			my $isa_check_for_metaschema_5furi = ${$_[1]->{"\$isa_check_for_metaschema_5furi"}};
4	1	1µs			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
5	1	0s			my $coerce_for_metaschema_5furi = ${$_[1]->{"\$coerce_for_metaschema_5furi"}};
6					package JSON::Schema::Modern::Document::OpenAPI;
7	2	54µs	2	59µs	# spent 35µs (11+24) within JSON::Schema::Modern::Document::OpenAPI::BEGIN@7 which was called: # once (11µs+24µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 35µs making 1 call to JSON::Schema::Modern::Document::OpenAPI::BEGIN@7 # spent 24µs making 1 call to warnings::unimport
8					sub _set_metaschema_uri {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package Method::Generate::Accessor::_Generated;
12					# spent 6µs within Method::Generate::Accessor::_Generated::BEGIN@12.250 which was called: # once (6µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	1µs			$^H = 1762;
14	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	9µs			%^H = (
16					);
17	1	110µs	1	6µs	} # spent 6µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@12.250
18					# END quote_sub PRELUDE
19					scalar do { my $value = do {
20					local $Method::Generate::Accessor::CurrentAttribute = {
21					init_arg => undef(),
22					name => "metaschema_uri",
23					step => "coercion",
24					};
25					(my $_return),
26					(my $_error), (my $_old_error = $@);
27					(eval {
28					($@ = $_old_error),
29					($_return =
30					$coerce_for_metaschema_5furi->($_[1])),
31					1
32					} or
33					$_error = CORE::ref $@ ? $@ : "coercion for \"metaschema_uri\" failed: ".$@);
34					($@ = $_old_error),
35					(defined $_error and CORE::die $_error);
36					$_return;
37					}
38					;
39	2	128µs	2	44µs	# spent 26µs (8+18) within Method::Generate::Accessor::_Generated::BEGIN@39.251 which was called: # once (8µs+18µs) by Sub::Quote::_clean_eval at line 39 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[Mojo::URL]))) or Type::Tiny::_failed_check($isa_check_for_metaschema_5furi, "InstanceOf[\"Mojo::URL\"]", $value, "attribute_name","metaschema_uri","attribute_step","isa check","mgaca","0","varname","\$self->{\"metaschema_uri\"}"); $value }), # spent 26µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@39.251 # spent 18µs making 1 call to warnings::unimport
40					($_[0]->{"metaschema_uri"} = $value),
41					($_[0]->{"metaschema_uri"}),
42					} }
43	1	1µs			$$_UNQUOTED = \&_set_metaschema_uri;
44					}
45	1	6µs			1;
46
47					;